home *** CD-ROM | disk | FTP | other *** search
/ BCI NET / BCI NET Dec 94.iso / archives / telecomm / terms / term-4.1-source.lha / Extras / Source / term-Source.lha / TerminalPanel.c < prev    next >
Encoding:
C/C++ Source or Header  |  1994-08-02  |  15.8 KB  |  635 lines
  1. /*
  2. **    TerminalPanel.c
  3. **
  4. **    Editing panel for terminal configuration
  5. **
  6. **    Copyright © 1990-1994 by Olaf `Olsen' Barthel
  7. **        All Rights Reserved
  8. */
  9.  
  10. #include "termGlobal.h"
  11.  
  12. enum    {    GAD_EMULATIONTYPE=1, GAD_EMULATIONLIBRARY, GAD_COLUMNS, GAD_LINES,
  13.         GAD_KEYMAP, GAD_TEXTFONT, GAD_FONTMODE, GAD_EMULATIONTASK, GAD_IBMFONT,
  14.         GAD_USE, GAD_CANCEL, GAD_DEFAULT };
  15.  
  16. STATIC LONG    LocalMaxColumns,
  17.         LocalMaxLines;
  18.  
  19. STATIC STRPTR __saveds
  20. ShowColumn(struct Gadget *SomeGadget,WORD Level)
  21. {
  22.     STATIC UBYTE Buffer[10];
  23.  
  24.     if(Level == LocalMaxColumns + 1)
  25.         strcpy(Buffer,LocaleString(MSG_TERMINALPANEL_MAXIMUM_TXT));
  26.     else
  27.         SPrintf(Buffer,LocaleBase ? "%9lD" : "%9ld",Level);
  28.  
  29.     return(Buffer);
  30. }
  31.  
  32. STATIC STRPTR __saveds
  33. ShowLine(struct Gadget *SomeGadget,WORD Level)
  34. {
  35.     STATIC UBYTE Buffer[10];
  36.  
  37.     if(Level == LocalMaxLines + 1)
  38.         strcpy(Buffer,LocaleString(MSG_TERMINALPANEL_MAXIMUM_TXT));
  39.     else
  40.         SPrintf(Buffer,LocaleBase ? "%9lD" : "%9ld",Level);
  41.  
  42.     return(Buffer);
  43. }
  44.  
  45.     /* SelectKeymap(UBYTE *Name,struct Window *ParentWindow):
  46.      *
  47.      *    Select a new keymap file using the asl.library file requester.
  48.      */
  49.  
  50. STATIC BYTE __regargs
  51. SelectKeymap(UBYTE *Name,struct Window *ParentWindow)
  52. {
  53.     struct FileRequester    *AslFileRequest;
  54.     UBYTE            *File,*Temp;
  55.     BYTE             NewMap = FALSE;
  56.  
  57.     File = Name;
  58.  
  59.     strcpy(SharedBuffer,File);
  60.  
  61.     Temp = PathPart(SharedBuffer);
  62.  
  63.     Temp[0] = 0;
  64.  
  65.     if(!SharedBuffer[0])
  66.     {
  67.         APTR OldPtr = ThisProcess -> pr_WindowPtr;
  68.         BPTR FileLock;
  69.  
  70.         ThisProcess -> pr_WindowPtr = (APTR)-1;
  71.  
  72.         if(FileLock = Lock("KEYMAPS:",ACCESS_READ))
  73.         {
  74.             strcpy(SharedBuffer,"KEYMAPS:");
  75.  
  76.             UnLock(FileLock);
  77.         }
  78.         else
  79.             strcpy(SharedBuffer,"Devs:Keymaps");
  80.  
  81.         ThisProcess -> pr_WindowPtr = OldPtr;
  82.     }
  83.  
  84.     File = FilePart(File);
  85.  
  86.     if(AslFileRequest = (struct FileRequester *)AllocAslRequestTags(ASL_FileRequest,
  87.         ASL_Window,    ParentWindow,
  88.         ASL_File,    File,
  89.         ASL_Dir,    SharedBuffer,
  90.         ASL_Hail,    LocaleString(MSG_TERMINALPANEL_SELECT_KEYMAP_TXT),
  91.         ASL_FuncFlags,    FILF_NEWIDCMP,
  92.         ASL_OKText,    LocaleString(MSG_GLOBAL_SELECT_TXT),
  93.     TAG_END))
  94.     {
  95.         if(AslRequestTags(AslFileRequest,TAG_DONE))
  96.         {
  97.             STRPTR FileName;
  98.  
  99.             if(AslFileRequest -> rf_NumArgs > 1 && AslFileRequest -> rf_ArgList)
  100.                 FileName = AslFileRequest -> rf_ArgList -> wa_Name;
  101.             else
  102.                 FileName = AslFileRequest -> rf_File;
  103.  
  104.             if(FileName[0])
  105.             {
  106.                 strcpy(SharedBuffer,AslFileRequest -> rf_Dir);
  107.  
  108.                 if(!AddPart(SharedBuffer,FileName,MAX_FILENAME_LENGTH))
  109.                     strcpy(SharedBuffer,FileName);
  110.  
  111.                 if(Stricmp(SharedBuffer,Name))
  112.                 {
  113.                     strcpy(Name,SharedBuffer);
  114.  
  115.                     NewMap = TRUE;
  116.                 }
  117.             }
  118.         }
  119.  
  120.         FreeAslRequest(AslFileRequest);
  121.     }
  122.  
  123.     return(NewMap);
  124. }
  125.  
  126. BYTE __regargs
  127. TerminalPanel(struct Configuration *LocalConfig,BYTE *Default)
  128. {
  129.     struct LayoutHandle    *Handle;
  130.     BYTE             Cancel = FALSE;
  131.  
  132.     SaveConfig(LocalConfig,PrivateConfig);
  133.  
  134.     if(Handle = LT_CreateHandleTags(Window -> WScreen,
  135.         LH_LocaleHook,    &LocaleHook,
  136.     TAG_DONE))
  137.     {
  138.         struct Window    *PanelWindow;
  139.         LONG         LocalColumns,
  140.                  LocalLines;
  141.         UBYTE         FontName[MAX_FILENAME_LENGTH],
  142.                  IBMName[MAX_FILENAME_LENGTH];
  143.  
  144.         BuildFontName(FontName,LocalConfig -> TerminalConfig -> TextFontName,LocalConfig -> TerminalConfig -> TextFontHeight);
  145.  
  146.         BuildFontName(IBMName,LocalConfig -> TerminalConfig -> IBMFontName,LocalConfig -> TerminalConfig -> IBMFontHeight);
  147.  
  148.         if(LocalConfig != Config)
  149.         {
  150.             LocalMaxColumns    = 132;
  151.             LocalMaxLines    = 64;
  152.         }
  153.         else
  154.         {
  155.             LONG    Width,
  156.                 Height;
  157.  
  158.             if(Screen)
  159.             {
  160.                 struct Rectangle DisplayClip;
  161.  
  162.                 if(LocalConfig -> ScreenConfig)
  163.                 {
  164.                     Width    = LocalConfig -> ScreenConfig -> DisplayWidth;
  165.                     Height    = LocalConfig -> ScreenConfig -> DisplayHeight;
  166.  
  167.                     QueryOverscan(LocalConfig -> ScreenConfig -> DisplayMode,&DisplayClip,LocalConfig -> ScreenConfig -> OverscanType);
  168.                 }
  169.                 else
  170.                 {
  171.                     Width    = LocalConfig -> ScreenConfig -> DisplayWidth;
  172.                     Height    = LocalConfig -> ScreenConfig -> DisplayHeight;
  173.  
  174.                     QueryOverscan(LocalConfig -> ScreenConfig -> DisplayMode,&DisplayClip,LocalConfig -> ScreenConfig -> OverscanType);
  175.                 }
  176.  
  177.                 if(!Width)
  178.                     Width = DisplayClip . MaxX - DisplayClip . MinX + 1;
  179.  
  180.                 if(!Height)
  181.                     Height = DisplayClip . MaxY - DisplayClip . MinY + 1;
  182.             }
  183.             else
  184.             {
  185.                 Width    = Window -> WScreen -> Width - Window -> WScreen -> WBorLeft - Window -> WScreen -> WBorRight;
  186.                 Height    = Window -> WScreen -> Height - Window -> WScreen -> WBorTop - Window -> WScreen -> WBorBottom - Window -> WScreen -> Font -> ta_YSize - 1;
  187.             }
  188.  
  189.             if(WindowWidth > Width)
  190.                 Width = WindowWidth;
  191.  
  192.             if(WindowHeight > Height)
  193.                 Height = WindowHeight;
  194.  
  195.             LocalMaxColumns    = Width  / TextFontWidth;
  196.             LocalMaxLines    = Height / TextFontHeight;
  197.  
  198.             if(LocalMaxColumns < 20)
  199.                 LocalMaxColumns = 20;
  200.  
  201.             if(LocalMaxLines < 20)
  202.                 LocalMaxLines = 20;
  203.         }
  204.  
  205.         LT_New(Handle,
  206.             LA_Type,    VERTICAL_KIND,
  207.         TAG_DONE);
  208.         {
  209.             LT_New(Handle,
  210.                 LA_Type,    VERTICAL_KIND,
  211.                 LA_LabelID,    MSG_V36_1020,
  212.             TAG_DONE);
  213.             {
  214.                 LT_New(Handle,
  215.                     LA_Type,    CYCLE_KIND,
  216.                     LA_LabelID,    MSG_TERMINALPANEL_EMULATION_GAD,
  217.                     LA_ID,        GAD_EMULATIONTYPE,
  218.                     LA_BYTE,    &LocalConfig -> TerminalConfig -> EmulationMode,
  219.                     LACY_FirstLabel,MSG_TERMINALPANEL_EMULATION_ANSI_VT102_TXT,
  220.                     LACY_LastLabel,    MSG_TERMINALPANEL_EMULATION_HEX_TXT,
  221.                 TAG_DONE);
  222.  
  223.                 LT_New(Handle,
  224.                     LA_Type,    STRING_KIND,
  225.                     LA_LabelID,    MSG_TERMINALPANEL_EMULATION_NAME_GAD,
  226.                     LA_Chars,    20,
  227.                     LA_ID,        GAD_EMULATIONLIBRARY,
  228.                     LA_STRPTR,    LocalConfig -> TerminalConfig -> EmulationFileName,
  229.                     GTST_MaxChars,    MAX_FILENAME_LENGTH - 1,
  230.                     LAST_Picker,    TRUE,
  231.                     GA_Disabled,    LocalConfig -> TerminalConfig -> EmulationMode != EMULATION_EXTERNAL,
  232.                 TAG_DONE);
  233.  
  234.                 LT_EndGroup(Handle);
  235.             }
  236.  
  237.             LT_New(Handle,
  238.                 LA_Type,    VERTICAL_KIND,
  239.                 LA_LabelID,    MSG_V36_1021,
  240.             TAG_DONE);
  241.             {
  242.                 LT_New(Handle,
  243.                     LA_Type,    CYCLE_KIND,
  244.                     LA_LabelID,    MSG_TERMINALPANEL_BELL_GAD,
  245.                     LA_BYTE,    &LocalConfig -> TerminalConfig -> BellMode,
  246.                     LACY_FirstLabel,MSG_TERMINALPANEL_BELL_IGNORE_TXT,
  247.                     LACY_LastLabel,    MSG_TERMINALPANEL_BELL_DEFAULT_TXT,
  248.                 TAG_DONE);
  249.  
  250.                 LT_New(Handle,
  251.                     LA_Type,    CYCLE_KIND,
  252.                     LA_LabelID,    MSG_TERMINALPANEL_ALERT_GAD,
  253.                     LA_BYTE,    &LocalConfig -> TerminalConfig -> AlertMode,
  254.                     LACY_FirstLabel,MSG_TERMINALPANEL_ALERT_NONE_TXT,
  255.                     LACY_LastLabel,    MSG_TERMINALPANEL_ALERT_SIGNAL_SCREEN_TXT,
  256.                 TAG_DONE);
  257.  
  258.                 if(LocalConfig -> TerminalConfig -> NumColumns < 20)
  259.                     LocalColumns = LocalMaxColumns + 1;
  260.                 else
  261.                     LocalColumns = LocalConfig -> TerminalConfig -> NumColumns;
  262.  
  263.                 LT_New(Handle,
  264.                     LA_Type,        SLIDER_KIND,
  265.                     LA_LabelID,        MSG_TERMINALPANEL_NUMCOLUMNS_GAD,
  266.                     LA_ID,            GAD_COLUMNS,
  267.                     LA_LONG,        &LocalColumns,
  268.                     GTSL_Min,        20,
  269.                     GTSL_Max,        LocalMaxColumns + 1,
  270.                     GTSL_DispFunc,        ShowColumn,
  271.                     GTSL_LevelFormat,    "%s",
  272.                 TAG_DONE);
  273.  
  274.                 if(LocalConfig -> TerminalConfig -> NumLines < 20)
  275.                     LocalLines = LocalMaxLines + 1;
  276.                 else
  277.                     LocalLines = LocalConfig -> TerminalConfig -> NumLines;
  278.  
  279.                 LT_New(Handle,
  280.                     LA_Type,        SLIDER_KIND,
  281.                     LA_LabelID,        MSG_TERMINALPANEL_NUMLINES_GAD,
  282.                     LA_LONG,        &LocalLines,
  283.                     LA_ID,            GAD_LINES,
  284.                     GTSL_Min,        20,
  285.                     GTSL_Max,        LocalMaxLines + 1,
  286.                     GTSL_DispFunc,        ShowLine,
  287.                     GTSL_LevelFormat,    "%s",
  288.                 TAG_DONE);
  289.  
  290.                 LT_New(Handle,
  291.                     LA_Type,    STRING_KIND,
  292.                     LA_LabelID,    MSG_TERMINALPANEL_KEYMAP_FILE_GAD,
  293.                     LA_Chars,    20,
  294.                     LA_ID,        GAD_KEYMAP,
  295.                     LA_STRPTR,    LocalConfig -> TerminalConfig -> KeyMapFileName,
  296.                     GTST_MaxChars,    MAX_FILENAME_LENGTH - 1,
  297.                     LAST_Picker,    TRUE,
  298.                 TAG_DONE);
  299.  
  300.                 LT_New(Handle,
  301.                     LA_Type,    CHECKBOX_KIND,
  302.                     LA_LabelID,    MSG_EMULATIONPANEL_USE_TERMINAL_TASK_TXT,
  303.                     LA_BYTE,    &LocalConfig -> TerminalConfig -> UseTerminalTask,
  304.                     LA_ID,        GAD_EMULATIONTASK,
  305.                     GA_Disabled,    LocalConfig -> TerminalConfig -> EmulationMode == EMULATION_EXTERNAL,
  306.                 TAG_DONE);
  307.  
  308.                 LT_EndGroup(Handle);
  309.             }
  310.  
  311.             LT_New(Handle,
  312.                 LA_Type,    VERTICAL_KIND,
  313.                 LA_LabelID,    MSG_V36_1024,
  314.             TAG_DONE);
  315.             {
  316.                 LT_New(Handle,
  317.                     LA_Type,    TEXT_KIND,
  318.                     LA_LabelID,    MSG_TERMINALPANEL_TEXT_FONT_GAD,
  319.                     LA_Chars,    20,
  320.                     LA_ID,        GAD_TEXTFONT,
  321.                     GTTX_Text,    FontName,
  322.                     GTTX_Border,    TRUE,
  323.                     LATX_Picker,    TRUE,
  324.                     GA_Disabled,    LocalConfig -> TerminalConfig -> EmulationMode == EMULATION_EXTERNAL,
  325.                 TAG_DONE);
  326.     
  327.                 LT_New(Handle,
  328.                     LA_Type,    TEXT_KIND,
  329.                     LA_LabelID,    MSG_TERMINALPANEL_IBM_FONT_GAD,
  330.                     LA_Chars,    20,
  331.                     LA_ID,        GAD_IBMFONT,
  332.                     GTTX_Text,    IBMName,
  333.                     GTTX_Border,    TRUE,
  334.                     LATX_Picker,    TRUE,
  335.                     GA_Disabled,    LocalConfig -> TerminalConfig -> EmulationMode == EMULATION_EXTERNAL,
  336.                 TAG_DONE);
  337.  
  338.                 LT_New(Handle,
  339.                     LA_Type,    CYCLE_KIND,
  340.                     LA_LabelID,    MSG_TERMINALPANEL_FONT_GAD,
  341.                     LA_ID,        GAD_FONTMODE,
  342.                     LA_BYTE,    &LocalConfig -> TerminalConfig -> FontMode,
  343.                     LACY_FirstLabel,MSG_TERMINALPANEL_FONT_STANDARD_TXT,
  344.                     LACY_LastLabel,    MSG_TERMINALPANEL_FONT_PC_RAW,
  345.                     GA_Disabled,    LocalConfig -> TerminalConfig -> EmulationMode == EMULATION_EXTERNAL,
  346.                 TAG_DONE);
  347.     
  348.                 LT_EndGroup(Handle);
  349.             }
  350.  
  351.             LT_New(Handle,
  352.                 LA_Type,    HORIZONTAL_KIND,
  353.                 LA_LabelID,    MSG_V36_1025,
  354.             TAG_DONE);
  355.             {
  356.                 LT_New(Handle,
  357.                     LA_Type,    VERTICAL_KIND,
  358.                 TAG_DONE);
  359.                 {
  360.                     LT_New(Handle,
  361.                         LA_Type,    CYCLE_KIND,
  362.                         LA_LabelID,    MSG_TERMINALPANEL_SEND_CR_GAD,
  363.                         LA_BYTE,    &LocalConfig -> TerminalConfig -> SendCR,
  364.                         GTCY_Labels,    EOL_Labels,
  365.                     TAG_DONE);
  366.     
  367.                     LT_New(Handle,
  368.                         LA_Type,    CYCLE_KIND,
  369.                         LA_LabelID,    MSG_TERMINALPANEL_SEND_LF_GAD,
  370.                         LA_BYTE,    &LocalConfig -> TerminalConfig -> SendLF,
  371.                         GTCY_Labels,    EOL_Labels,
  372.                     TAG_DONE);
  373.  
  374.                     LT_EndGroup(Handle);
  375.                 }
  376.     
  377.                 LT_New(Handle,
  378.                     LA_Type,    VERTICAL_KIND,
  379.                 TAG_DONE);
  380.                 {
  381.                     LT_New(Handle,
  382.                         LA_Type,    CYCLE_KIND,
  383.                         LA_LabelID,    MSG_TERMINALPANEL_RECEIVE_CR_GAD,
  384.                         LA_BYTE,    &LocalConfig -> TerminalConfig -> ReceiveCR,
  385.                         GTCY_Labels,    EOL_Labels,
  386.                     TAG_DONE);
  387.     
  388.                     LT_New(Handle,
  389.                         LA_Type,    CYCLE_KIND,
  390.                         LA_LabelID,    MSG_TERMINALPANEL_RECEIVE_LF_GAD,
  391.                         LA_BYTE,    &LocalConfig -> TerminalConfig -> ReceiveLF,
  392.                         GTCY_Labels,    EOL_Labels,
  393.                     TAG_DONE);
  394.  
  395.                     LT_EndGroup(Handle);
  396.                 }
  397.     
  398.                 LT_EndGroup(Handle);
  399.             }
  400.  
  401.             LT_New(Handle,
  402.                 LA_Type,    VERTICAL_KIND,
  403.             TAG_DONE);
  404.             {
  405.                 LT_New(Handle,LA_Type,XBAR_KIND,LAXB_FullSize,TRUE,TAG_DONE);
  406.  
  407.                 LT_EndGroup(Handle);
  408.             }
  409.  
  410.             LT_New(Handle,LA_Type,HORIZONTAL_KIND,
  411.                 LAGR_SameSize,    TRUE,
  412.                 LAGR_Spread,    TRUE,
  413.             TAG_DONE);
  414.             {
  415.                 LT_New(Handle,
  416.                     LA_Type,    BUTTON_KIND,
  417.                     LA_LabelID,    MSG_GLOBAL_USE_GAD,
  418.                     LA_ID,        GAD_USE,
  419.                     LABT_ReturnKey,    TRUE,
  420.                     LABT_ExtraFat,    TRUE,
  421.                 TAG_DONE);
  422.  
  423.                 if(Default)
  424.                 {
  425.                     LT_New(Handle,
  426.                         LA_Type,    BUTTON_KIND,
  427.                         LA_LabelID,    MSG_GLOBAL_DEFAULT_GAD,
  428.                         LA_ID,        GAD_DEFAULT,
  429.                         LABT_ExtraFat,    TRUE,
  430.                     TAG_DONE);
  431.                 }
  432.  
  433.                 LT_New(Handle,
  434.                     LA_Type,    BUTTON_KIND,
  435.                     LA_LabelID,    MSG_GLOBAL_CANCEL_GAD,
  436.                     LA_ID,        GAD_CANCEL,
  437.                     LABT_EscKey,    TRUE,
  438.                     LABT_ExtraFat,    TRUE,
  439.                 TAG_DONE);
  440.  
  441.                 LT_EndGroup(Handle);
  442.             }
  443.  
  444.             LT_EndGroup(Handle);
  445.         }
  446.  
  447.         if(PanelWindow = LT_Layout(Handle,LocaleString(MSG_TERMINALPANEL_TERMINAL_PREFERENCES_TXT),NULL,0,0,IDCMP_CLOSEWINDOW,0,
  448.             LAWN_HelpHook,        &GuideHook,
  449.             LAWN_Parent,        Window,
  450.             WA_DepthGadget,        TRUE,
  451.             WA_CloseGadget,        TRUE,
  452.             WA_DragBar,        TRUE,
  453.             WA_RMBTrap,        TRUE,
  454.             WA_Activate,        TRUE,
  455.         TAG_DONE))
  456.         {
  457.             struct IntuiMessage    *Message;
  458.             BOOLEAN             Done = FALSE;
  459.             ULONG             MsgClass,
  460.                          MsgQualifier;
  461.             UWORD             MsgCode;
  462.             struct Gadget        *MsgGadget;
  463.             UBYTE             DummyBuffer[MAX_FILENAME_LENGTH];
  464.  
  465.             GuideContext(CONTEXT_TERMINAL);
  466.  
  467.             PushWindow(PanelWindow);
  468.  
  469.             LT_ShowWindow(Handle,TRUE);
  470.  
  471.             do
  472.             {
  473.                 if(Wait(PORTMASK(PanelWindow -> UserPort) | SIG_BREAK) & SIG_BREAK)
  474.                 {
  475.                     SaveConfig(PrivateConfig,LocalConfig);
  476.  
  477.                     break;
  478.                 }
  479.  
  480.                 while(Message = (struct IntuiMessage *)GT_GetIMsg(PanelWindow -> UserPort))
  481.                 {
  482.                     MsgClass    = Message -> Class;
  483.                     MsgQualifier    = Message -> Qualifier;
  484.                     MsgCode        = Message -> Code;
  485.                     MsgGadget    = (struct Gadget *)Message -> IAddress;
  486.  
  487.                     GT_ReplyIMsg(Message);
  488.  
  489.                     LT_HandleInput(Handle,MsgQualifier,&MsgClass,&MsgCode,&MsgGadget);
  490.  
  491.                     if(MsgClass == IDCMP_CLOSEWINDOW)
  492.                     {
  493.                         SaveConfig(PrivateConfig,LocalConfig);
  494.  
  495.                         Done = TRUE;
  496.                     }
  497.  
  498.                     if(MsgClass == IDCMP_GADGETUP)
  499.                     {
  500.                         switch(MsgGadget -> GadgetID)
  501.                         {
  502.                             case GAD_USE:
  503.  
  504.                                 LocalConfig -> TerminalConfig -> NumColumns    = LocalColumns % (LocalMaxColumns + 1);
  505.                                 LocalConfig -> TerminalConfig -> NumLines        = LocalLines % (LocalMaxLines + 1);
  506.  
  507.                                 if(!LocalConfig -> TerminalConfig -> EmulationFileName[0] && LocalConfig -> TerminalConfig -> EmulationMode == EMULATION_EXTERNAL)
  508.                                     LocalConfig -> TerminalConfig -> EmulationMode = EMULATION_ANSIVT100;
  509.  
  510.                                 Done = TRUE;
  511.                                 break;
  512.  
  513.                             case GAD_EMULATIONTYPE:
  514.  
  515.                                 LT_SetAttributes(Handle,GAD_TEXTFONT,
  516.                                     GA_Disabled,    LocalConfig -> TerminalConfig -> EmulationMode == EMULATION_EXTERNAL,
  517.                                 TAG_DONE);
  518.  
  519.                                 LT_SetAttributes(Handle,GAD_IBMFONT,
  520.                                     GA_Disabled,    LocalConfig -> TerminalConfig -> EmulationMode == EMULATION_EXTERNAL,
  521.                                 TAG_DONE);
  522.  
  523.                                 LT_SetAttributes(Handle,GAD_FONTMODE,
  524.                                     GA_Disabled,    LocalConfig -> TerminalConfig -> EmulationMode == EMULATION_EXTERNAL,
  525.                                 TAG_DONE);
  526.  
  527.                                 LT_SetAttributes(Handle,GAD_EMULATIONLIBRARY,
  528.                                     GA_Disabled,    LocalConfig -> TerminalConfig -> EmulationMode != EMULATION_EXTERNAL,
  529.                                 TAG_DONE);
  530.  
  531.                                 LT_SetAttributes(Handle,GAD_EMULATIONTASK,
  532.                                     GA_Disabled,    LocalConfig -> TerminalConfig -> EmulationMode == EMULATION_EXTERNAL,
  533.                                 TAG_DONE);
  534.  
  535.                                 break;
  536.  
  537.                             case GAD_CANCEL:
  538.  
  539.                                 SaveConfig(PrivateConfig,LocalConfig);
  540.  
  541.                                 Cancel = Done = TRUE;
  542.                                 break;
  543.  
  544.                             case GAD_DEFAULT:
  545.  
  546.                                 *Default = TRUE;
  547.  
  548.                                 Done = TRUE;
  549.                                 break;
  550.                         }
  551.                     }
  552.  
  553.                     if(MsgClass == IDCMP_IDCMPUPDATE)
  554.                     {
  555.                         switch(MsgGadget -> GadgetID)
  556.                         {
  557.                             case GAD_EMULATIONLIBRARY:
  558.  
  559.                                 LT_LockWindow(PanelWindow);
  560.  
  561.                                 strcpy(DummyBuffer,(STRPTR)LT_GetAttributes(Handle,GAD_EMULATIONLIBRARY,TAG_DONE));
  562.                                 strcpy(SharedBuffer,DummyBuffer);
  563.  
  564.                                 if(PickFile(PanelWindow,"Libs:","xem#?.library",LocaleString(MSG_TERMINALPANEL_SELECT_EMULATOR_TXT),SharedBuffer,NT_LIBRARY))
  565.                                 {
  566.                                     if(Stricmp(SharedBuffer,DummyBuffer))
  567.                                         LT_SetAttributes(Handle,GAD_EMULATIONLIBRARY,GTST_String,SharedBuffer,TAG_DONE);
  568.                                 }
  569.  
  570.                                 LT_ShowWindow(Handle,TRUE);
  571.  
  572.                                 LT_UnlockWindow(PanelWindow);
  573.                                 break;
  574.  
  575.                             case GAD_KEYMAP:
  576.  
  577.                                 LT_LockWindow(PanelWindow);
  578.  
  579.                                 strcpy(DummyBuffer,(STRPTR)LT_GetAttributes(Handle,GAD_KEYMAP,TAG_DONE));
  580.  
  581.                                 if(SelectKeymap(DummyBuffer,PanelWindow))
  582.                                     LT_SetAttributes(Handle,GAD_KEYMAP,GTST_String,SharedBuffer,TAG_DONE);
  583.  
  584.                                 LT_UnlockWindow(PanelWindow);
  585.                                 break;
  586.  
  587.                             case GAD_TEXTFONT:
  588.  
  589.                                 LT_LockWindow(PanelWindow);
  590.  
  591.                                 if(PickFont(PanelWindow,LocalConfig -> TerminalConfig -> TextFontName,&LocalConfig -> TerminalConfig -> TextFontHeight,TRUE))
  592.                                 {
  593.                                     BuildFontName(FontName,LocalConfig -> TerminalConfig -> TextFontName,LocalConfig -> TerminalConfig -> TextFontHeight);
  594.  
  595.                                     LT_SetAttributes(Handle,GAD_TEXTFONT,
  596.                                         GTTX_Text,    FontName,
  597.                                     TAG_DONE);
  598.                                 }
  599.  
  600.                                 LT_UnlockWindow(PanelWindow);
  601.                                 break;
  602.  
  603.                             case GAD_IBMFONT:
  604.  
  605.                                 LT_LockWindow(PanelWindow);
  606.  
  607.                                 if(PickFont(PanelWindow,LocalConfig -> TerminalConfig -> IBMFontName,&LocalConfig -> TerminalConfig -> IBMFontHeight,TRUE))
  608.                                 {
  609.                                     BuildFontName(IBMName,LocalConfig -> TerminalConfig -> IBMFontName,LocalConfig -> TerminalConfig -> IBMFontHeight);
  610.  
  611.                                     LT_SetAttributes(Handle,GAD_IBMFONT,
  612.                                         GTTX_Text,    IBMName,
  613.                                     TAG_DONE);
  614.                                 }
  615.  
  616.                                 LT_UnlockWindow(PanelWindow);
  617.                                 break;
  618.                         }
  619.                     }
  620.                 }
  621.             }
  622.             while(!Done);
  623.  
  624.             PopWindow();
  625.         }
  626.  
  627.         LT_DeleteHandle(Handle);
  628.     }
  629.  
  630.     if(Default)
  631.         return((BYTE)(!Cancel));
  632.     else
  633.         return((BYTE)memcmp(PrivateConfig -> TerminalConfig,LocalConfig -> TerminalConfig,sizeof(struct TerminalSettings)));
  634. }
  635.